";
foreach($tpic_rslt as $tpic_key =>$tpic_val)
{
$tpic_dtls=explode("@",$tpic_key);
// print_r($tpic_dtls);
$invr_scre=$tpic_dtls[0];
$invr_lnks=$tpic_dtls[1];
$invr_rchs=$tpic_dtls[2];
// echo "".$invr_rchs."
";
$lnks_rslt=xtrt_xxxx($invr_rchs,$invr_taal,"data",2);
// echo "
LNKS RSLT";
foreach($lnks_rslt as $lnks_key => $lnks_val)
{
$rslt_dtls=explode("!!",$lnks_key);
$lnks_corp=$rslt_dtls[2];
$lnks_lnks=$rslt_dtls[3];
$lnks_rchs=$rslt_dtls[4];
$rchs_itms=explode("/",$lnks_rchs);
$lnks_corp=$rchs_itms[2];
// print_r($rchs_itms);
$linvr_lnks="".$lnks_lnks."";
if ($rchs_itms[1] == "data")
{
$linvr_lnks=" ".$lnks_corp." | ".substr($invr_lnks,0,64)." |
";
}
}
// print_r($lnks_rslt);
$sinvr_rchs=str_replace(" ","+",$invr_rchs);
$sinvr_bzv1=str_replace(" ","+",$invr_bzv1);
// echo "SINVR BZV1 ".$sinvr_bzv1;
if ($invr_lnks != null)
{
if ($crelt != $invr_lnks)
{
// echo "
INVR LNKS ".$invr_lnks;
$crelt=$invr_lnks;
$lnks_dtls=explode(" ",$invr_lnks);
// print_r($lnks_dtls);
if (count($lnks_dtls) <4)
{
echo " |
";
}
}
}
}
// echo " XTRT DATA Prototype versie
";
echo "
";
echo "